Windows News 2005 November/WNnov2005.iso/Windows/Indispensables/Movie Collection/MovieCollection5403.exe/{app}/MovieCollection.exe/0/RCDATA/TFRMCOLLECTIONSAFFECTE/TFRMCOLLECTIONSAFFECTE.txt

Text File | 2005-08-08 | 6KB | 211 lines

inherited FrmCollectionsAffecte: TFrmCollectionsAffecte
  Left = 320
  Top = 85
  Width = 550
  Height = 486
  HelpContext = 1030
  Caption = 'FrmCollectionsAffecte'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter [0]
    Left = 233
    Top = 0
    Width = 5
    Height = 407
  end
  inherited sb: TTBXStatusBar
    Top = 433
    Width = 542
  end
  object TBXDock1: TTBXDock [2]
    Left = 0
    Top = 407
    Width = 542
    Height = 26
    Position = dpBottom
    object TBToolbar1: TTBXToolbar
      Left = 0
      Top = 0
      Align = alBottom
      BorderStyle = bsNone
      Caption = 'TBToolbar'
      DockMode = dmCannotFloatOrChangeDocks
      DockPos = 152
      DragHandleStyle = dhNone
      FullSize = True
      Images = ImageListSmall
      TabOrder = 0
      object TBItem2: TTBXItem
        Action = ActionValider
        DisplayMode = nbdmImageAndText
      end
      object TBItem3: TTBXItem
        Action = ActionCancel
        DisplayMode = nbdmImageAndText
      end
      object TBSeparatorItem1: TTBXSeparatorItem
      end
      object TBItem1: TTBXItem
        Action = ActionRenumeroter
        DisplayMode = nbdmImageAndText
      end
      object TBXSeparatorItem1: TTBXSeparatorItem
      end
      object TBXItem1: TTBXItem
        Action = ActionAide
        DisplayMode = nbdmImageAndText
      end
      object TBControlItem1: TTBControlItem
        Control = ImgChaine
      end
      object ImgChaine: TImage
        Left = 295
        Top = 4
        Width = 7
        Height = 14
        AutoSize = True
        Picture.Data = {<image000.bmp>}
        Visible = False
      end
    end
  end
  object cxGridCollections: TcxGrid [3]
    Left = 0
    Top = 0
    Width = 233
    Height = 407
    Align = alLeft
    TabOrder = 2
    object cxGridCollectionsDBTableView: TcxGridDBTableView
      OnDragDrop = cxGridCollectionsDBTableViewDragDrop
      OnDragOver = cxGridCollectionsDBTableViewDragOver
      NavigatorButtons.ConfirmDelete = False
      DataController.DataSource = dsCollection
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      OptionsBehavior.CellHints = True
      OptionsCustomize.ColumnFiltering = False
      OptionsCustomize.ColumnGrouping = False
      OptionsCustomize.ColumnHiding = True
      OptionsCustomize.ColumnHidingOnGrouping = False
      OptionsData.Deleting = False
      OptionsData.DeletingConfirmation = False
      OptionsData.Editing = False
      OptionsData.Inserting = False
      OptionsSelection.CellSelect = False
      OptionsView.ColumnAutoWidth = True
      OptionsView.GroupByBox = False
      Styles.StyleSheet = dtmSession.cxGridTableViewStyleSheet
    end
    object cxGridCollectionsLevel: TcxGridLevel
      GridView = cxGridCollectionsDBTableView
    end
  end
  object cxGrid: TcxGrid [4]
    Left = 238
    Top = 0
    Width = 304
    Height = 407
    Align = alClient
    TabOrder = 3
    object cxGridDBTableView: TcxGridDBTableView
      DragMode = dmAutomatic
      OnMouseDown = cxGridDBTableViewMouseDown
      NavigatorButtons.ConfirmDelete = False
      OnCellClick = cxGridDBTableViewCellClick
      DataController.DataSource = dsFilms
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      OptionsCustomize.ColumnFiltering = False
      OptionsCustomize.ColumnGrouping = False
      OptionsData.Appending = True
      OptionsData.Deleting = False
      OptionsData.DeletingConfirmation = False
      OptionsData.Editing = False
      OptionsData.Inserting = False
      OptionsSelection.CellSelect = False
      OptionsSelection.MultiSelect = True
      OptionsView.GroupByBox = False
      Styles.StyleSheet = dtmSession.cxGridTableViewStyleSheetAlternate
    end
    object cxGridLevel: TcxGridLevel
      GridView = cxGridDBTableView
    end
  end
  inherited aclFiche: TActionList
    object ActionRenumeroter: TAction
      Caption = 'Renum'#233'roter'
      ImageIndex = 21
      OnExecute = ActionRenumeroterExecute
      OnUpdate = ActionRenumeroterUpdate
    end
    object ActionCancel: TAction
      Caption = 'Abandonner'
      ImageIndex = 0
      OnExecute = ActionCancelExecute
    end
    object ActionValider: TAction
      Caption = 'Valider'
      ImageIndex = 1
      OnExecute = ActionValiderExecute
    end
    object ActionPersonnaliserColonnes: TAction
      Caption = 'Personnaliser colonnes'
      OnExecute = ActionPersonnaliserColonnesExecute
    end
  end
  object qryFiche: TIBQuery
    Database = dtmSession.IBDatabase
    BufferChunks = 1000
    CachedUpdates = False
    Left = 160
    Top = 144
  end
  object dsCollection: TDataSource
    DataSet = memCollections
    Left = 24
    Top = 264
  end
  object qryCollection: TIBQuery
    Database = dtmSession.IBDatabase
    BufferChunks = 1000
    CachedUpdates = False
    Left = 24
    Top = 304
  end
  object memCollections: TdxMemData
    Indexes = <>
    SortOptions = []
    AfterScroll = memCollectionsAfterScroll
    Left = 96
    Top = 304
  end
  object cdFilms: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'ProviderFilms'
    Left = 320
    Top = 112
  end
  object ProviderFilms: TDataSetProvider
    BeforeUpdateRecord = ProviderFilmsBeforeUpdateRecord
    Left = 320
    Top = 168
  end
  object dsFilms: TDataSource
    DataSet = cdFilms
    Left = 328
    Top = 352
  end
  object PopupMenuCollections: TPopupMenu
    Left = 456
    Top = 200
    object Personnalisercolonnes2: TMenuItem
      Action = ActionPersonnaliserColonnes
    end
  end
end